define add proc(a,b)
	return := a + b
end;

define curry proc(f, b)
   return := proc(a) return := f(a,b) end
end;

z := curry(add,5)(4)
